home *** CD-ROM | disk | FTP | other *** search
- object frmPublishField: TfrmPublishField
- Left = 121
- Top = 94
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsDialog
- Caption = 'Add Publish Field'
- ClientHeight = 287
- ClientWidth = 417
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Pitch = fpVariable
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object pnlLower: TPanel
- Left = 0
- Top = 249
- Width = 417
- Height = 38
- Align = alBottom
- TabOrder = 0
- object butFinish: TButton
- Left = 256
- Top = 7
- Width = 74
- Height = 25
- Caption = '&Finish'
- ModalResult = 1
- TabOrder = 3
- Visible = False
- end
- object butNext: TButton
- Left = 255
- Top = 7
- Width = 75
- Height = 25
- Caption = 'Next >&>'
- TabOrder = 1
- OnClick = butNextClick
- end
- object butCancel: TButton
- Left = 336
- Top = 7
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- object butBack: TButton
- Left = 180
- Top = 7
- Width = 75
- Height = 25
- Caption = '&<< Back'
- Enabled = False
- TabOrder = 0
- OnClick = butBackClick
- end
- object btnHelp: TButton
- Left = 6
- Top = 7
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 4
- OnClick = btnHelpClick
- end
- end
- object pageLink: TPageControl
- Left = 0
- Top = 0
- Width = 417
- Height = 249
- ActivePage = tab1
- Align = alTop
- TabOrder = 1
- object tab1: TTabSheet
- Caption = 'tab1'
- TabVisible = False
- object Label1: TLabel
- Left = 130
- Top = 10
- Width = 265
- Height = 41
- AutoSize = False
- Caption = 'This Wizard helps you to add publishing fields to a template.'
- WordWrap = True
- end
- object Label7: TLabel
- Left = 130
- Top = 192
- Width = 265
- Height = 39
- AutoSize = False
- Caption =
- 'If you aren'#39't sure which preferences relate to what or are confu' +
- 'sed by all this terminology, then press the Help button.'
- WordWrap = True
- end
- object imgWizard: TPaintBox
- Left = 8
- Top = 7
- Width = 110
- Height = 225
- OnPaint = imgWizardPaint
- end
- object Label10: TLabel
- Left = 133
- Top = 93
- Width = 184
- Height = 13
- Caption = 'When should this template field apply?'
- end
- object rgWhen: TRadioGroup
- Left = 155
- Top = 109
- Width = 197
- Height = 68
- HelpContext = 522
- ItemIndex = 0
- Items.Strings = (
- 'When a document is created'
- 'When a document gets published')
- TabOrder = 0
- end
- end
- object tab2: TTabSheet
- Caption = 'tab2'
- TabVisible = False
- object Label2: TLabel
- Left = 130
- Top = 8
- Width = 265
- Height = 41
- AutoSize = False
- Caption =
- 'When fields are published they can be filled in by the User, aut' +
- 'omatically by Hotdog, or read from a file. '
- WordWrap = True
- end
- object Label11: TLabel
- Left = 130
- Top = 83
- Width = 145
- Height = 13
- Caption = 'How is the field to be filled in ?'
- end
- object rgHow: TRadioGroup
- Left = 165
- Top = 105
- Width = 201
- Height = 103
- HelpContext = 526
- ItemIndex = 0
- Items.Strings = (
- 'By the user'
- 'Automatically by HotDog'
- 'Read from a file')
- TabOrder = 0
- end
- end
- object tabFields: TTabSheet
- Caption = 'tabFields'
- TabVisible = False
- object Label6: TLabel
- Left = 132
- Top = 8
- Width = 265
- Height = 15
- AutoSize = False
- Caption = 'Enter the field information.'
- WordWrap = True
- end
- object grpUser: TGroupBox
- Left = 128
- Top = 48
- Width = 273
- Height = 185
- TabOrder = 0
- object Label3: TLabel
- Left = 10
- Top = 13
- Width = 69
- Height = 13
- Caption = 'Message text:'
- end
- object Label4: TLabel
- Left = 10
- Top = 127
- Width = 68
- Height = 13
- Caption = 'Default value:'
- end
- object txtDefault: TEdit
- Left = 8
- Top = 145
- Width = 252
- Height = 21
- HelpContext = 686
- TabOrder = 0
- end
- object memPrompt: TMemo
- Left = 8
- Top = 32
- Width = 254
- Height = 89
- HelpContext = 685
- TabOrder = 1
- end
- end
- object grpFile: TGroupBox
- Left = 128
- Top = 48
- Width = 273
- Height = 185
- TabOrder = 2
- object Label5: TLabel
- Left = 10
- Top = 10
- Width = 46
- Height = 13
- Caption = 'Filename:'
- end
- object Label8: TLabel
- Left = 11
- Top = 50
- Width = 71
- Height = 13
- Caption = 'Field (optional)'
- Visible = False
- end
- object Label9: TLabel
- Left = 10
- Top = 50
- Width = 65
- Height = 13
- Caption = 'File contents:'
- end
- object spdFilename: TSpeedButton
- Left = 239
- Top = 26
- Width = 23
- Height = 21
- OnClick = spdFilenameClick
- end
- object txtFileName: TEdit
- Left = 8
- Top = 26
- Width = 231
- Height = 21
- HelpContext = 523
- TabOrder = 0
- end
- object memFileGuts: TMemo
- Left = 8
- Top = 66
- Width = 257
- Height = 105
- HelpContext = 525
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 1
- end
- object txtFileField: TEdit
- Left = 9
- Top = 66
- Width = 255
- Height = 21
- HelpContext = 524
- TabOrder = 2
- Visible = False
- end
- end
- object grpHotDog: TGroupBox
- Left = 128
- Top = 48
- Width = 273
- Height = 185
- TabOrder = 1
- object lstAuto: TListBox
- Left = 8
- Top = 16
- Width = 255
- Height = 149
- HelpContext = 687
- ItemHeight = 13
- Items.Strings = (
- 'Date'
- 'Time'
- 'HotDog Version'
- 'Windows Version'
- 'HotDog Registered Company'
- 'HotDog Registered User')
- TabOrder = 0
- end
- end
- end
- end
- end
-